3.420 \(\int \frac{\left (a+b x^2\right )^p}{(d+e x)^2} \, dx\)

Optimal. Leaf size=244 \[ -\frac{2 b p x \left (a+b x^2\right )^p \left (\frac{b x^2}{a}+1\right )^{-p} F_1\left (\frac{1}{2};-p,1;\frac{3}{2};-\frac{b x^2}{a},\frac{e^2 x^2}{d^2}\right )}{a e^2+b d^2}+\frac{b (2 p+1) x \left (a+b x^2\right )^p \left (\frac{b x^2}{a}+1\right )^{-p} \, _2F_1\left (\frac{1}{2},-p;\frac{3}{2};-\frac{b x^2}{a}\right )}{a e^2+b d^2}-\frac{b d e \left (a+b x^2\right )^{p+1} \, _2F_1\left (2,p+1;p+2;\frac{e^2 \left (b x^2+a\right )}{b d^2+a e^2}\right )}{(p+1) \left (a e^2+b d^2\right )^2}+\frac{e^2 x \left (a+b x^2\right )^{p+1}}{\left (d^2-e^2 x^2\right ) \left (a e^2+b d^2\right )} \]

[Out]

(e^2*x*(a + b*x^2)^(1 + p))/((b*d^2 + a*e^2)*(d^2 - e^2*x^2)) - (2*b*p*x*(a + b*
x^2)^p*AppellF1[1/2, -p, 1, 3/2, -((b*x^2)/a), (e^2*x^2)/d^2])/((b*d^2 + a*e^2)*
(1 + (b*x^2)/a)^p) + (b*(1 + 2*p)*x*(a + b*x^2)^p*Hypergeometric2F1[1/2, -p, 3/2
, -((b*x^2)/a)])/((b*d^2 + a*e^2)*(1 + (b*x^2)/a)^p) - (b*d*e*(a + b*x^2)^(1 + p
)*Hypergeometric2F1[2, 1 + p, 2 + p, (e^2*(a + b*x^2))/(b*d^2 + a*e^2)])/((b*d^2
+ a*e^2)^2*(1 + p))

_______________________________________________________________________________________

Rubi [A]  time = 0.412003, antiderivative size = 191, normalized size of antiderivative = 0.78, number of steps used = 8, number of rules used = 7, integrand size = 17, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.412 \[ \frac{x \left (a+b x^2\right )^p \left (\frac{b x^2}{a}+1\right )^{-p} F_1\left (\frac{1}{2};-p,2;\frac{3}{2};-\frac{b x^2}{a},\frac{e^2 x^2}{d^2}\right )}{d^2}+\frac{e^2 x^3 \left (a+b x^2\right )^p \left (\frac{b x^2}{a}+1\right )^{-p} F_1\left (\frac{3}{2};-p,2;\frac{5}{2};-\frac{b x^2}{a},\frac{e^2 x^2}{d^2}\right )}{3 d^4}-\frac{b d e \left (a+b x^2\right )^{p+1} \, _2F_1\left (2,p+1;p+2;\frac{e^2 \left (b x^2+a\right )}{b d^2+a e^2}\right )}{(p+1) \left (a e^2+b d^2\right )^2} \]

Warning: Unable to verify antiderivative.

[In]  Int[(a + b*x^2)^p/(d + e*x)^2,x]

[Out]

(x*(a + b*x^2)^p*AppellF1[1/2, -p, 2, 3/2, -((b*x^2)/a), (e^2*x^2)/d^2])/(d^2*(1
+ (b*x^2)/a)^p) + (e^2*x^3*(a + b*x^2)^p*AppellF1[3/2, -p, 2, 5/2, -((b*x^2)/a)
, (e^2*x^2)/d^2])/(3*d^4*(1 + (b*x^2)/a)^p) - (b*d*e*(a + b*x^2)^(1 + p)*Hyperge
ometric2F1[2, 1 + p, 2 + p, (e^2*(a + b*x^2))/(b*d^2 + a*e^2)])/((b*d^2 + a*e^2)
^2*(1 + p))

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 18.2297, size = 144, normalized size = 0.59 \[ - \frac{\left (\frac{e \left (\sqrt{b} x + \sqrt{- a}\right )}{\sqrt{b} \left (d + e x\right )}\right )^{- p} \left (- \frac{e \left (- \sqrt{b} x + \sqrt{- a}\right )}{\sqrt{b} \left (d + e x\right )}\right )^{- p} \left (a + b x^{2}\right )^{p} \left (\frac{1}{d + e x}\right )^{2 p} \left (\frac{1}{d + e x}\right )^{- 2 p + 1} \operatorname{appellf_{1}}{\left (- 2 p + 1,- p,- p,- 2 p + 2,\frac{d - \frac{e \sqrt{- a}}{\sqrt{b}}}{d + e x},\frac{d + \frac{e \sqrt{- a}}{\sqrt{b}}}{d + e x} \right )}}{e \left (- 2 p + 1\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate((b*x**2+a)**p/(e*x+d)**2,x)

[Out]

-(e*(sqrt(b)*x + sqrt(-a))/(sqrt(b)*(d + e*x)))**(-p)*(-e*(-sqrt(b)*x + sqrt(-a)
)/(sqrt(b)*(d + e*x)))**(-p)*(a + b*x**2)**p*(1/(d + e*x))**(2*p)*(1/(d + e*x))*
*(-2*p + 1)*appellf1(-2*p + 1, -p, -p, -2*p + 2, (d - e*sqrt(-a)/sqrt(b))/(d + e
*x), (d + e*sqrt(-a)/sqrt(b))/(d + e*x))/(e*(-2*p + 1))

_______________________________________________________________________________________

Mathematica [A]  time = 0.131194, size = 141, normalized size = 0.58 \[ \frac{\left (a+b x^2\right )^p \left (\frac{e \left (x-\sqrt{-\frac{a}{b}}\right )}{d+e x}\right )^{-p} \left (\frac{e \left (\sqrt{-\frac{a}{b}}+x\right )}{d+e x}\right )^{-p} F_1\left (1-2 p;-p,-p;2-2 p;\frac{d-\sqrt{-\frac{a}{b}} e}{d+e x},\frac{d+\sqrt{-\frac{a}{b}} e}{d+e x}\right )}{e (2 p-1) (d+e x)} \]

Warning: Unable to verify antiderivative.

[In]  Integrate[(a + b*x^2)^p/(d + e*x)^2,x]

[Out]

((a + b*x^2)^p*AppellF1[1 - 2*p, -p, -p, 2 - 2*p, (d - Sqrt[-(a/b)]*e)/(d + e*x)
, (d + Sqrt[-(a/b)]*e)/(d + e*x)])/(e*(-1 + 2*p)*((e*(-Sqrt[-(a/b)] + x))/(d + e
*x))^p*((e*(Sqrt[-(a/b)] + x))/(d + e*x))^p*(d + e*x))

_______________________________________________________________________________________

Maple [F]  time = 0.069, size = 0, normalized size = 0. \[ \int{\frac{ \left ( b{x}^{2}+a \right ) ^{p}}{ \left ( ex+d \right ) ^{2}}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int((b*x^2+a)^p/(e*x+d)^2,x)

[Out]

int((b*x^2+a)^p/(e*x+d)^2,x)

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (b x^{2} + a\right )}^{p}}{{\left (e x + d\right )}^{2}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x^2 + a)^p/(e*x + d)^2,x, algorithm="maxima")

[Out]

integrate((b*x^2 + a)^p/(e*x + d)^2, x)

_______________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \[{\rm integral}\left (\frac{{\left (b x^{2} + a\right )}^{p}}{e^{2} x^{2} + 2 \, d e x + d^{2}}, x\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x^2 + a)^p/(e*x + d)^2,x, algorithm="fricas")

[Out]

integral((b*x^2 + a)^p/(e^2*x^2 + 2*d*e*x + d^2), x)

_______________________________________________________________________________________

Sympy [F(-1)]  time = 0., size = 0, normalized size = 0. \[ \text{Timed out} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x**2+a)**p/(e*x+d)**2,x)

[Out]

Timed out

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (b x^{2} + a\right )}^{p}}{{\left (e x + d\right )}^{2}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((b*x^2 + a)^p/(e*x + d)^2,x, algorithm="giac")

[Out]

integrate((b*x^2 + a)^p/(e*x + d)^2, x)